 'ӵǰԪƶһԪ

'Application.ActiveCell.Offset(0,1).Select
Application.ActiveCell.Offset(0, 1).Activate